## Not run:
# suppressMessages(library(cubfits, quietly = TRUE))
#
# reu13.df <- rearrange.reu13.df(ex.train$reu13.df)
# y <- rearrange.y(ex.train$y)
# n <- rearrange.n(ex.train$n)
# phi.Obs <- rearrange.phi.Obs(ex.train$phi.Obs)
# ## End(Not run)
Run the code above in your browser using DataLab